5 POKE649,0:POKE53280,2:POKE53281,0
20 PRINTCHR$(14)"[147]"TAB(10)"[176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]"
25 PRINTTAB(10)"[221]                   [221]"
26 PRINTTAB(10)"[221]                   [221]"
30 PRINTTAB(10)"[221]    [154][208]LEASE WAIT:   [221]"
40 PRINTTAB(10)"[221]      [154][204]OADING      [221]"
50 PRINTTAB(10)"[221]                   [221]"
51 PRINTTAB(10)"[221]                   [221]"
52 PRINTTAB(10)"[221]                   [221]"
53 PRINTTAB(10)"[173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]"
80 PRINT"[155][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184]"
90 PRINT"[152]                                    "
95 PRINT"             [212]HE [200]ORSE              "
100 PRINT"   BY [212]HOMAS [196]. [195]ANFIELD ([195])1989    "
110 PRINT"     [208]UBLISHED ON [204][207][193][196][211][212][193][210] #66      "
115 PRINT"    [211]UBSCRIPTIONS 1-800-831-2694    "
120 PRINT"         [193]LL [210]IGHTS [210]ESERVED        "
125 PRINT"                                    "
130 PRINT"[151][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][155]";
170 FORA=0TO3:READA$,HB%,LB%
180 POKE214,8:PRINT:PRINTTAB(18)A$
190 SYS57812A$,8,0:POKE780,0:POKE781,LB%:POKE782,HB%:SYS65493
200 NEXT
240 SYS40143:POKE649,10
250 POKE53280,2:POKE53281,0:CLOSE15:OPEN15,8,15:CLOSE15:IFST=0THEN280
260 PRINT"[147]"CHR$(14):POKE214,7:PRINT:PRINTTAB(7)"[176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]"
261 PRINTTAB(7)"[221]  [155][196]ISK DRIVE NOT READY.  [221]"
265 PRINTTAB(7)"[221] [155][208]RESS [210][197][212][213][210][206][146] WHEN READY [221]"
266 PRINTTAB(7)"[221]       [155]TO TRY AGAIN.     [221]"
267 PRINTTAB(7)"[173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]"
270 GETA$:IFA$<>CHR$(13)THEN270
275 GOTO250
280 CLOSE15:OPEN15,8,15,"R0:HELLO CONNECT=HELLO CONNECT":INPUT#15,ER%:CLOSE15
290 IFER%=63THEN320
300 PRINT"[147]"CHR$(14):POKE214,7:PRINT:PRINTTAB(7)"[176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]"
301 PRINTTAB(7)"[221]  [155][201]NSERT [204][207][193][196][211][212][193][210] DISK  [221]"
305 PRINTTAB(7)"[221]   [155]IN DRIVE AND PRESS   [221]"
306 PRINTTAB(7)"[221]   [155][210][197][212][213][210][206][146] WHEN READY.   [221]"
307 PRINTTAB(7)"[173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]"
310 GETA$:IFA$<>CHR$(13)THEN310
315 GOTO250
320 POKE646,PEEK(53281):PRINT"[147]LOAD"CHR$(34)"HELLO CONNECT"CHR$(34)",8"
330 PRINT"RUN"
340 POKE631,13:POKE632,13:POKE633,13:POKE198,3:END
400 DATA"[210]ANCH",37,94
410 DATA"[195]ORRAL",64,0
420 DATA"[211]TABLE",127,123
430 DATA"[200]ORSE ",192,0
10000 OPEN15,8,15,"S0:HORSE BOOT":CLOSE15:SAVE"HORSE BOOT",8:END